report from Authors Write Articles PartOf Issues \
  where State=AZ or State=SD \
  sorted by LastName FirstName Volume Number
 
report heading \ 
  'Articles by Author'		: line 7 center: 
 
page heading break heading level 1 \ 
  'Pmt  Vol Num                  Title' 
 
break 1 write.authornr \ 
  heading \ 
  $concat($chop(firstname), ' ', $chop(lastname)) \ 
  : newline 2 \
  mask 'Articles by: ????????????????????????????????':
 
break 2 year \ 
  heading \ 
  ''		: newline 2: \ 
  footing \ 
  year	 \
  : newline 2 mask '    Total compensation in year ????': \ 
  $money($total(payment+bonus)) \
  : column 38 mask '$$$,$$$.99': 
 
detail line \ 
  column heading off \ 
  (payment + bonus)		: mask 'ZZZZ':\ 
  issues.volume			: column 6 mask 'ZZ':\ 
  issues.number			: column 9 mask 'ZZ':\ 
  title					: column 12: 
 
endreport
